home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 40.zip / BS1 part 40 / SkyFlight+Bouncer.adf / AndysHacklings / Pacland.cheat (.txt) < prev    next >
AmigaBASIC Source Code  |  2018-01-21  |  1KB  |  28 lines
  1.  
  2.  
  3. 10 REM --- (c) CRACKED BY ANDY GRIFO, PACLAND.CRACK ---
  4. 20 checksum = 0 : total = 222986 : crack = 630
  5. 30 START = 582 : FINISH = 657 : GOSUB 50
  6. 40 GOTO 90                      
  7. 50 FOR n = START TO FINISH STEP 2
  8. 60 READ a$:a = VAL("&h"+a$)
  9. 70 checksum = checksum + a
  10. 80 POKEW n,a:NEXT n:RETURN
  11. 90 PRINT "Your Checksum = ";checksum
  12. 100 IF checksum<>total THEN PRINT "Data error.":END
  13. 110 PRINT "Place PAC-LAND in DRIVE 0.Click On Screen"
  14. 120 PRINT "I will Intercept at The Point When You Loose a"
  15. 130 PRINT "Life,indicated by The Power Light Going ON or OFF"
  16. 140 INPUT "PRESS RETURN AND THE GAME WILL BOOT",Grifo$
  17. 150 CALL crack
  18.  
  19.  
  20. 160 DATA 397c,0250,00bc,4eec,000c,21fc,4eb8,025c
  21. 170 DATA 05a4,4ef8,0400,3d7c,0005,10c0,3d7c,0005
  22. 180 DATA 0014,0879,0001,00bf,e001,4a6e,0012,4e75
  23. 190 DATA 2c78,0004,207c,00fe,88c0,43f8,0100,303c
  24. 200 DATA 0145,12d8,51c8,fffc,4ef8,0116
  25.  
  26.  
  27.  
  28.